home *** CD-ROM | disk | FTP | other *** search
/ My Neighborhood / My Neighborhood.iso / mac / MacFiles / Zoo5.Dxr / 00082.ls < prev    next >
Encoding:
Text File  |  1997-11-18  |  364 b   |  15 lines
  1. on WEASELSpeak soundName
  2.   puppetSound(soundName)
  3.   updateStage()
  4.   repeat while soundBusy(1)
  5.     set temp to random(4)
  6.     set CatHead to the number of cast ("TALK" & temp)
  7.     set the castNum of sprite 8 to CatHead
  8.     updateStage()
  9.     wait(6)
  10.   end repeat
  11.   set the castNum of sprite 8 to the number of cast "DEFAULT HEAD"
  12.   puppetSound(0)
  13.   updateStage()
  14. end
  15.